home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / SCRIPTZ / C-SCRIPT.EXE / ChanBot / raw.cbs < prev    next >
Text File  |  1997-04-03  |  1KB  |  39 lines
  1. #max2 off
  2. raw *:* { halt }
  3. #MAX2 end
  4. raw 352:* {
  5.   set %adrs $6 $+ ! $+ $3 $+ @ $+ $4
  6.   set %clones $mask(%adrs,2)
  7.   if  (%clones isin %clist) { /inc %clns | %nclns = %nclns $6 | %clnsaddys = %clnsaddys $3 $+ @ $+ $4 }
  8.   %clist = %clist %clones
  9.   set %addy $mask(%adrs,3)
  10.   inc %ppl
  11.   if (($level(%addy) == =999) || ($level(%addy) == 999))  { /inc %enem | /set %emnick $6 }
  12.   if (($left(2,$7) == H@) || ($left(2,$7) == G@)) { /inc %fops  } |  else { /inc %nops }
  13.   if (G isin $7) { /inc %appl }
  14.   if (+ isin $7) { /inc %vppl }
  15.   if (($left(2,$7) == H*) || ($left(2,$7) == G*)) { /inc %found  | %iropn = %iropn $6 }
  16.   if (($level(%addy) > 199) && ($level(%addy) < 501) && ($6 !isop $2)) { /mode $2 +o $6 }
  17. }
  18. raw 315:* {
  19.   if (%SCANRAW != Off) { /report | /set %SCANRAW Off }
  20.   if (%SSCANRAW != Off) { /sreport | /set %SSCANRAW Off }
  21.   if (%CSCANRAW != Off) { /creport | /set %CSCANRAW Off }
  22.   if (%IRCopsRAW != Off) { /sIRCops | /set %IRCopsRAW Off }
  23. }
  24. raw 436: * {
  25.   /amsg -WARNING- Nick Collide Detected! Changing nick!
  26.   /rn
  27.   /timer 1 4   /rn
  28.   /timer 1 60 /nick $me
  29. }
  30. raw 367:* {
  31.   inc %cbns 1
  32. }
  33. raw 324:* {
  34.   set %scmd $3
  35. }
  36. raw 332:* {
  37.   set %schantop $3-
  38. }
  39.